home *** CD-ROM | disk | FTP | other *** search
/ MGE USV-Infopaket 2003 January / MGE USV Infopaket Ausgabe 1-2003 (German).iso / START.SXT < prev   
Text File  |  2001-03-13  |  2KB  |  36 lines
  1.  
  2.  
  3. check_vba:
  4.     if file_exist (system_directory & "\\Asycfilt.dll") == 0
  5.        copy "\\vb60run\\Asycfilt.dll" to system_directory & "\\Asycfilt.dll"
  6.        execute "\\vb60run\\regsvr32.exe Asycfilt.dll /s"
  7.  
  8.     if file_exist (system_directory & "\\Comcat.dll") == 0
  9.        copy "\\vb60run\\Comcat.dll" to system_directory & "\\Comcat.dll"
  10.        execute "\\vb60run\\regsvr32.exe Comcat.dll /s"
  11.     
  12.     if file_exist (system_directory & "\\Msvbvm60.dll") == 0
  13.        copy "\\vb60run\\Msvbvm60.dll" to system_directory & "\\Msvbvm60.dll"
  14.        execute "\\vb60run\\regsvr32.exe Msvbvm60.dll /s"
  15.     
  16.     if file_exist (system_directory & "\\Oleaut32.dll") == 0
  17.        copy "\\vb60run\\Oleaut32.dll" to system_directory & "\\Oleaut32.dll"
  18.        execute "\\vb60run\\regsvr32.exe Oleaut32.dll /s"
  19.     
  20.     if file_exist (system_directory & "\\Olepro32.dll") == 0
  21.        copy "\\vb60run\\Olepro32.dll" to system_directory & "\\Olepro32.dll"
  22.        execute "\\vb60run\\regsvr32.exe Olepro32.dll /s"
  23.     
  24.     if file_exist (system_directory & "\\Vb6de.dll") == 0
  25.        copy "\\vb60run\\Vb6de.dll" to system_directory & "\\Vb6de.dll"
  26.        execute "\\vb60run\\regsvr32.exe Vb6de.dll /s"
  27.     
  28.     if file_exist (system_directory & "\\Vb6stkit.dll") == 0
  29.        copy "\\vb60run\\Vb6stkit.dll" to system_directory & "\\Vb6stkit.dll"
  30.        execute "\\vb60run\\regsvr32.exe Vb6stkit.dll /s"
  31.     
  32.     if file_exist (system_directory & "\\Stdole.tlb") == 0
  33.        copy "\\vb60run\\Stdole.tlb" to system_directory & "\\Stdole.tlb"
  34.        execute "\\vb60run\\regsvr32.exe Stdole.tlb /s"
  35.     
  36.